home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1999 #2 / Amiga Plus CD - 1999 - No. 2.iso / System-Boost / Workbench / AssignMaster / Install / english < prev   
Encoding:
Text File  |  1998-11-16  |  3.4 KB  |  114 lines

  1. (welcome "Welcome to the installation utility for AssignMaster.")
  2.  
  3. (if (= (askbool (prompt "A T T E N T I O N !\n\n"
  4.                         "An older version of AssignMaster should be completely "
  5.                         "removed (including all save files) before installing new "
  6.                         "Version 1.4.\n\n"
  7.                         "Continue installing AssignMaster?")
  8.                 (help @askbool-help)
  9.                 (default 1)
  10.         ) 0)
  11.   (
  12.     (exit (cat "\n\nUser break installation procedure. "
  13.                "No files are copied.")
  14.           (quiet)
  15.     )
  16.   )
  17. )
  18.  
  19. (set #destination_prg (askdir (prompt "Please select destination drawer "
  20.                                       " for AssignMaster executable.")
  21.                               (help @askdir-help)
  22.                               (default "SYS:Tools")
  23.                       )
  24. )
  25.  
  26.  
  27. (set #destination_doc (askdir (prompt "Choose the destination for "
  28.                                       "the documentation file.")
  29.                               (help @askdir-help)
  30.                               (default "HELP:")
  31.                       )
  32. )
  33.  
  34. (set #libcopy (askbool (prompt "Will you install the support.library for "
  35.                                "AssignMaster?\n\nYou only need it to handle "
  36.                                "the startup files, but this feature won't "
  37.                                "work correctly!")
  38.                        (help @askbool-help)
  39.                        (default 0)
  40.               )
  41. )
  42.  
  43. (copyfiles (prompt "Copy executable...")
  44.            (help @copyfiles-help)
  45.            (source "/AssignMaster")
  46.            (dest #destination_prg)
  47.            (files)
  48.            (confirm)
  49.            (infos)
  50. )
  51.  
  52. (copyfiles (prompt "Copy english documentation...")
  53.            (help @copyfiles-help)
  54.            (source "/docs/AM_Eng.GUIDE")
  55.            (dest #destination_doc)
  56.            (newname "AssignMaster.guide")
  57.            (files)
  58.            (confirm)
  59.            (infos)
  60. )
  61.  
  62. (copyfiles (prompt "Copy history text...")
  63.            (help @copyfiles-help)
  64.            (source "/docs/AM_History.txt")
  65.            (dest #destination_doc)
  66.            (newname "AssignMaster.History")
  67.            (files)
  68.            (infos)
  69.            (confirm)
  70. )
  71.  
  72. (if (= 1 #libcopy)
  73.  
  74.   (copylib (prompt "Copy support.library...")
  75.            (help @copyfiles-help)
  76.            (source "/libs/amsupport.library")
  77.            (dest "LIBS:")
  78.   )
  79. )
  80.  
  81. (if (= 1 (askbool (prompt "The following function is only useable for later "
  82.                           "installation of AssignMaster in the 'startup-sequence'.\n\n"
  83.                           "Should the current assign-list saved now?\n\n"
  84.                           "If you not sure, select \"No\".")
  85.                   (help @askbool-help)
  86.                   (default 0)
  87.                   (choices "Ja" "Nein")
  88.          )
  89.     )
  90.   (
  91.     (set #savefile (askfile (prompt "Select path and name of savefile now.")
  92.                             (help @askfile-help)
  93.                             (default #destination_prg)
  94.                    )
  95.     )
  96.     (set #amcommand (cat (tackon #destination_prg "AssignMaster")
  97.                          " BACKUP=\""
  98.                          #savefile
  99.                          "\"")
  100.     )
  101.     (run #amcommand (prompt (cat "Saving current assign list into file:\n"
  102.                                  #savefile)
  103.                     )
  104.                     (help @run-help)
  105.                     (confirm)
  106.     )
  107.   )
  108. )
  109.  
  110. (exit (cat "Installation complete.\n\n")
  111.       (quiet)
  112. )
  113.  
  114.